




********************************************************************************
* Replication code for Benjamin E. Goldsmith. 2006. "A Universal Proposition:  *
* Region, Conflict, War and the Robustness of the Kantian Peace," European     *
* Journal of International Relations 12, 4: 533-563.						   *
********************************************************************************

***Table 1

**Model 1 
** [Results here are different from those reported in the article because the data are 
** for 1921-1992 conflict years only - original data with observations from 1885 lost]
#del;
set more off;
tsset dyadid year;

xtgee dispute1 smldmat smldep  smigoabi lcaprat2 allies  noncontg  logdstab 
minrpwrs 
if year > 1919, family(binomial) link(logit) corr(ar1) force robust nolog;

**Model 2
#del;
set more off;

xtgee dispute1 smldmat smldep  smigoabi lcaprat2 allies  noncontg  logdstab 
minrpwrs lsmgdppc r1 r2 r3 r4 r5
if year > 1919, family(binomial) link(logit) corr(ar1) force robust nolog;

**Model 3
#del;
set more off;

xtgee dispute1 smldmat smldmat_r1 smldmat_r2 smldmat_r3 smldmat_r4 smldmat_r5
smldep smldep_r1 smldep_r2 smldep_r3 smldep_r4 smldep_r5 smigoabi smigoabi_r1
smigoabi_r2 smigoabi_r3 smigoabi_r4 smigoabi_r5 lcaprat2 lcaprat2_r1 lcaprat2_r2
lcaprat2_r3 lcaprat2_r4 lcaprat2_r5 allies allies_r1 allies_r2 allies_r3 allies_r4
allies_r5 noncontg noncontg_r1 noncontg_r2 noncontg_r4 logdstab logdstab_r1
logdstab_r2 logdstab_r3 logdstab_r4 logdstab_r5 minrpwrs minrpwrs_r1 minrpwrs_r4
lsmgdppc r1 r3 r4 r5
if year > 1919, family(binomial) link(logit) corr(ar1) force robust nolog;


***Table 2
#del;

summarize dispute1 wardmy

smldmat smldep  smigoabi lcaprat2 allies  noncontg  logdstab minrpwrs lsmgdppc;

#del;
sort BGRegionAB;
set more off;
by BGRegionAB: summarize dispute1 wardmy
smldmat smldep  smigoabi lcaprat2 allies  noncontg  logdstab minrpwrs lsmgdppc;

#del;
set more off;
by BGRegionAB: tab wardmy;
by BGRegionAB: corr dispute1 wardmy;
by BGRegionAB: corr dispute1 wardmy if year>1950;
by BGRegionAB: tab wardmy;
by BGRegionAB: corr dispute1 wardmy;
by BGRegionAB: corr dispute1 wardmy if year>1950;


***Table 3
**Model 4

#del;
set more off;
tsset dyadid year;
xtgee dispute1 smldmat smldep smigoabi lcaprat2 allies noncontg logdstab minrpwrs 
if year > 1919 & r0==1, family(binomial) link(logit) corr(ar1) force robust nolog;

**Model 5 [original records are lost, but I believe all models were run in Stata
**version 8, Model 5 drops the 'allies' variable in Stata 13 ]

#del;
set more off;
version 8: xtgee wardmy smldmat smldep smigoabi lcaprat2 allies noncontg logdstab minrpwrs
if year > 1919 & r0==1, family(binomial) link(logit) corr(ar1) force robust nolog ;


***Table 4

**Model 6 "the West"

#del;

xtgee dispute1 smldmat smldep smigoabi lcaprat2 allies noncontg logdstab minrpwrs 
if year > 1919 & r1==1, family(binomial) link(logit) corr(ar1) force robust nolog;

**Model 7 Africa

#del;

xtgee dispute1 smldmat smldep smigoabi lcaprat2 allies noncontg logdstab minrpwrs 
if year > 1919 & r3==1, family(binomial) link(logit) corr(ar1) force robust nolog;

**Model 8 Asia

#del;

xtgee dispute1 smldmat smldep smigoabi lcaprat2 allies noncontg logdstab minrpwrs 
if year > 1919 & r4==1, family(binomial) link(logit) corr(ar1) force robust nolog;

**Model 9 Asia, War

#del;

xtgee wardmy smldmat smldep smigoabi lcaprat2  noncontg logdstab minrpwrs 
if year > 1919 & r4==1, family(binomial) link(logit) corr(ar1) force robust nolog;

**Model 10 Latin America

#del;

xtgee dispute1 smldmat smldep smigoabi lcaprat2 allies noncontg logdstab minrpwrs 
if year > 1919 & r5==1, family(binomial) link(logit) corr(ar1) force robust nolog;

**Model 11 Middle East
#del;

xtgee dispute1 smldmat smldep smigoabi lcaprat2 allies noncontg logdstab minrpwrs 
if year > 1919 & r2==1, family(binomial) link(logit) corr(ar1) force robust nolog;


**Model 12 Middle East, War
#del;

xtgee wardmy smldmat smldep smigoabi lcaprat2 allies noncontg logdstab minrpwrs 
if year > 1919 & r2==1, family(binomial) link(logit) corr(ar1) force robust nolog;







